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ATTENTION 

This Is a USER program. Other than requiring that it conform to submittal and review standards, 
no quality control has been imposed upon this program by DECUS. 

The DECUS Program Library is a clearing house only; it does not generate or test programs. No 
warranty, express or implied, is made by the contributor, Digital Equipment Computer Users 
Society or Digital Equipment Corporation as to the accuracy or functioning of the program or 
related material, and no responsibility is assumed by these parties in connection therewith. 



RWDF32 



DECUS Program Library Write-up 



□ ECUS NO. 8-632 



ABSTRACT 
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THIS FORTRAN RND SflBR CRLLRBLE PROGRRM ALLOWS BLOCKED INPUT 
AND OUTPUT FROM DF32 DISKS WHERE THE BLOCK SIZE 
IS ft PARAMETER. 



USAGE 

>4< Hof: -'£>+'• 

SINCE THE DF32 IS ADDRESS ORIENTED RATHER THAN BLOCK ORIENTED, 
IT IS OFTEN DESIRABLE TO WRITE INFORMATION IS UNUSUAL 
BLOCK SIZES. 

CALL RDF32CADD, IBLKSZ, IBLK) 

CALL WDF32< ADD, IBLKSZ, 1 600 

RDF32 READS FROM THE DISK RND WDF32 WRITES TO THE DISK. 

ADD IS THE STARTING MEMORV ADDRESS FOR THE TRANSFER, 

IBLKSZ IS THE BLOCK SIZE, 

AND IBLK IS THE BLOCK NUMBER USING BLOCK SIZE IBLKSZ. 



NOTE: CURRENTLV, THE ROUTINE IS WRITTEN FOR 2 DF32 DISKS. TO 
CHRNGE THIS , SEE COMMENTS AT MPLT. 



ERROR MESSAGE 

DF32 ERROR AT LOC XXXX 

THIS MESSAGE IS GENERATED WHEN THE READ OR WRITE WOULD 
BE TO AN ADDRESS WHICH IS TOO LARGE FOR THE DISK AVAILABLE. 
EXECUTION TERMINATES, AND CONTROL RETURNS TO THE KEVBOARD MONITOR. 



NOTE : THIS ROUTINE REQUIRES 1 PAGE OF MEMORV WHEN LOADED. 




